perm filename SL.INI[MAC,LSP] blob sn#583854 filedate 1981-05-03 generic text, type C, neo UTF8
COMMENT āŠ—   VALID 00002 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	(comment bps 20000. core 80.)
C00003 ENDMK
CāŠ—;
(comment bps 20000. core 80.)
(progn (close infile)(inpush -1)
       (help)
       (or (ecalledp)(setq em:no-init t))
       (fasload emaclsp)
       (defun slave ()
	      (em:init)
	      (em:set-jobnum
	       (progn (terpri)(princ '|E Job # = |)(read))) 
	      (setq -em:sfa- (sfa-create (function em:mail-sfa) 0 'mail-sfa))
	      (setq tyi -em:sfa-)
	      (setq tyo -em:sfa-)
	      )
       (slave))